(use-modules (artanis artanis))

(init-server)

(define version-json (json (object ("versions" ("r0.2.0")))))
(get "/_matrix/client/versions" #:mime 'json
	 (lambda (rc) (:mime rc version-json)))

(run #:host "0.0.0.0" #:port 8008)
